home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 7 (Internal Edition) / Apple R&P Lib Internal v7.0.iso / 5-Fonts & Software / Demo Software / Swivel 3D Professional Demo / Command Set examples / Furniture example / Furniture example text < prev    next >
Text File  |  1990-07-30  |  829b  |  39 lines
  1. OpenWorld Furniture
  2.     FindObject Table
  3.     Copy  ( get the table )
  4. CloseWorld
  5.  
  6. NewWorld  ( now create a new file )
  7.     NewObject 
  8.     RelPos:  0  -.5  0  ,  ( position the new object )
  9.     RelAtt:   0  -90  0  ,
  10.     RelScale:  100  ,
  11.     Paste  ( we made a table by pasting the table into the new object )
  12.     MakeName Table1
  13.     SaveAsWorld Interior1
  14. CloseWorld
  15.  
  16. OpenWorld Furniture  ( back to furniture library for more )
  17.     FindObject Chair
  18.     Copy  ( now the chair is on the clipboard )
  19. CloseWorld
  20.  
  21. OpenWorld Interior1  ( open our file again )
  22.     NewObject
  23.     RelPos:  0  .5  -2.6  ,
  24.     RelAtt:  0  90  0  ,
  25.     RelScale:  100  ,
  26.     Paste  ( the first chair is pasted into the file )
  27.     MakeName Chair1
  28.  
  29.     NewObject 
  30.     RelPos:  0  .5  1.6  ,
  31.     RelAtt:  180  90  0  ,
  32.     RelScale:  100  ,
  33.     Paste  ( the second chair is pasted into the file )
  34.     MakeName Chair2
  35.  
  36.     SaveWorld
  37.  
  38.  
  39.